﻿Partial Public Class Home
    Inherits Page

    Public Sub New()
        InitializeComponent()
    End Sub

    'Executes when the user navigates to this page.
    Protected Overrides Sub OnNavigatedTo(ByVal e As System.Windows.Navigation.NavigationEventArgs)

    End Sub

    Private Sub GetContentCompleted(ByVal sender As Object, ByVal e As ContentService.GetContentCompletedEventArgs)

        Me.ContentText.Text = e.Result

    End Sub

    Private Sub Home_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded

        Dim proxy As New ContentService.ContentServiceSoapClient

        AddHandler proxy.GetContentCompleted, AddressOf GetContentCompleted

        proxy.GetContentAsync("Home")

    End Sub

End Class
